EXTENDED CPC DSK File Disk-Info Spectaculator(Track-Info R Track-Info  R CCODE s COLIN  COLIN  !"DISK #$%&'()*+,-./012DISK  34PLUS3DOSH988{ >:"=2">: :!>#: =2 :" >:"=2">: :!>#: =2 :!<2!:" >:"=2">: :!>#:!<2!:" >:"=2">: :!>#: =2 :!=2!:" !H ͵!+~ !X6FX>G^>>GV::\(8Ͱ*Y\R#>w4 p\!D\ ~( 6 Track-Info  R MG9G WMT$ P P P 3MRWq MQ ?v>!͵! ͵!͵#MM!͵+ 3m!͵# !v>!@>#^{+s#r#= k >BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBGGGGGGGGBBBBBBBBBBBBBBBBBBBBBBBBBFFFFFFFFRECEPTION AREA - START YOUR TASK                           EGYPTOLOGY-THE STUDY OF MUMMIES!"                                       FOSSIL ROOM-LOTS OF OLD BONES!                           THE HISTORY OF TRANSPORTATION!                                     WEAPONS AND WARFARE OF THE AGE!                            THE INDUSTRIAL REVOLUTION!                           THE REFRESHMENT AREA                                                 THE LIBRARY AND INFORMATION AREA          Track-Info  R                        MEDIEVAL HISTORY-THE DARK AGES                                     NATURAL HISTORY-THE ANIMAL WORLD                                  SCIENCE AND TECHNOLOGY                                ARTS-CRAFTS AND RECREATION !                           FAR EAST-INDIA-JAPAN AND CHINA                                    THE EXHIBITION AND DISPLAY HALL!                                   THE EGRESS-WHICH MEANS WAY OUT!                              NATURAL HISTORY-THE ANIMAL WORLDTrack-Info  R <<~B<|~@B@BBB@x888x8800 0 ?gkks~ < >``~6f`c~>`osc~ 0`?c>cc~?cg{ 00000000` 0 >>0  0>cf T((T6cc~fc~?c`c~~ccf|`~``~``?`occccc|fl|fc````?kkkkcskgc?ccc~c~``?ckf}c~cc>`~cccc~ccc6kkk~lc66cc600$B$$$<<$$$B$ 0__08DT88DD8^c.**6 >bk$ = B =  T] B!W w#BB|@@01000 i)31=2y>01000 n&=K$(2)y<312000 s*31=1y<312000 x=K$(3)3000 } 31=163000 ,Track-Info  R =K$(4).1}L,9 :200 /=K$(5).2~L,5::6000p 80P A=1502:A H=0 &N=1110n:""210 N #H=H+2:H>2H=0 5H:.01z# =,12 :.02{# =,0:205 &.1}L,24:0:80P  R1=0 ,(x-1,y-1)=122z80P (x,y-1)=122zx,y;" ";x-1,y;" ":x=x-1:y=y-1:x,y;"e";x-1,y;"a":L=15:L:.005y# =,10 :80P (x,y-1)>1ƫ(X,Y-1)7x,y;" ";x-1,y;" ":y=y-1:x,y;"e";x-1,y;"a":oc=oc+1:4600:80P G(x,y-1)=207ū(x-1,y-1)=2074110 U(x+1,y-1)=71GX,Y;" ";X-1,Y;" ":Y=Y-1:4000 'L1=L1+1:L1=5L1=1 OX,Y;" ";X-1,Y;" ":Y=Y-1:(1309+L1):R1=0:80P 1x,y;"e";x-1,y;"a":.002xn,9 : 1x,y;"f";x-1,y;"b":.002xn,9 :  1x,y;"g";x-1,y;"c":.002xn,9 : !1x,y;"h";x-1,y;"d":.002xn,9 :  L1=0 ,(x-1,y+1)=122z80P ՟(x,y+1)=122zx,y;" ";x-1,y;" ":x=x-1:y=y+1:x,y;"x";x-1,y;"i":L=15:L:.005y# =,10 :80P ڗ(x,y+1)>1ƫ(X,Y+1)7x,y;" ";x-1,y;" ":y=y+1:x,y;"v";x-1,y;"i":oc=oc+1:4600:80P G(x,y+1)=207ū(x-1,y+1)=2074110 U(x+1,y+1)=71GX,Y;" ";X-1,Y;" ":Y=Y+1:4000 'R1=R1+1:R1=5R1=1 OX,Y;" ";X-1,Y;" ":Y=Y+1:(2309 +R1):L1=0:80P 1x,y;"v";x-1,y;"i":.002xn,9 : 1x,y;"w";x-1,y;"j":.002xn,9 : 1x,y;"x";x-1,y;"k":.002xn,9 : 1x,y;"y";x-1,y;"l":.002xn,9 : R1,2500 : %(x+1,y)=70F3050 $(x+1,y)=73300 80P a=x:55000 x,y;" ";x-1,y;" " e.01z# =,a:.02{# =,a-24:a=a+1:a,y;"";a-1,y;"~";6;a-2,y;"&" 5(a+1,y)=122zx=a:3100 :80P 3055 L1=031200 &(1309+L1):3130: 0(2309 +R1) : L1=0G$="vi" R1=0G$="ea" 55000:a=70-1:a;x,y;g$(1);x-1,y;g$(2):.003xD,A:a:0;0;X,Y;" ";X-1,Y;" " Aa=x0-1:(a,y)=122zx=a-1:3350 a 52204,4:52200:a=07:a;x,y;g$(1);x-1,y;g$(2):.003xD,A:a:80P x,y;" ";x-1,y;" " a=x17 =(a+1,y)=122zū(a+1,y)=74030 ka,y;"~";a+1,y;"";a-1,y;" ":.008zn,a:.008zn,a-12 :254,(*200)  A:0 K55060:.1}L,0:N=120:N:.5,-20 TZ=07:Z:Z;A-1,y;"m";A,y;"n":52204,Z:52200:Z fZ=70-1:Z:Z;A-1,y;"m";A,y;"n":52204,Z:52200:Z:0 A,y;" ";A-1,y;" " 54970:8010J R54970:lev=lev+1:.5,lev:lev=16ti14605 99040P#:9060d#:y=1:x=18:75K ?SC=SC+10 :55030:#1;0,25;SC: LEV164606 :9300T$ a:TI00,0;"WHAT A WALLY...YOU HAVE LEFT IT FAR TOO LATE.TRY AGAIN!!" k''" WHAT A DISASTER...YOU WEREN'T EVEN GOOD ENOUGH TO QUALIFY FOR THE HIGH SCORE TABLE! " /N=12:55060:N:100d  4700\ C,D:C=-99c4650*  C/40(,D:C/40(,D % 4630 *M=61-1:52204,M:M::55030:N=011 :N,0;M;Z$;21-N,0;Z$:N:52200:M:0:0:7: 4 6000p \:3,0,3,5,3,7,3,9 ,3,7,3,4,3,0,3,5,3,7,3,9 ,3,7,3,0,3,5,3,7,3,9 ,3,7,3Track-Info  R ,4,3,4,3,5,3,4,3,0,3,0,3,12 ,3,11 ,3,9 ,3,7,3,11 ,3,7,3,9 ,3,5,3,7,3,12 ,3,11 ,3,9 ,3,7,3,11 ,3,7,3,12 ,3,11 ,3,9 ,3,7,3,11 ,3,7,3,9 ,3,5,3,7,3,4,3,5,3,4,3,0,8,0 L3,0,3,5,3,7,3,9 ,3,7,3,4,3,0,3,5,3,7,3,9 ,3,7,3,0,3,5,3,7,3,9 ,3,7,3,4,3,4,3,5,3,4,3,0,3,0,3,12 ,3,11 ,3,9 ,3,7,3,11 ,3,7,3,9 ,3,5,3,7,3,12 ,3,11 ,3,9 ,3,7,3,11 ,3,7,3,12 ,3,11 ,3,9 ,3,7,3,11 ,3,7,3,9 ,3,5,3,7,3,4,3,5,3,4,3,0,8,0,-99c,0 :65380d:A=07.5:.01z# =,10 :A;10 ,6;"KEY SELECTION PHASE";8,1;"C O L I N T H E C L E A N E R":A: "KEY TO MOVE LEFT ? " "KEY TO MOVE RIGHT ? " "THE ACTION KEY ? " "THE HOLD KEY ? " "THE ABORT KEY ? " gA=0KEY+2.5:.01z# =,10 :10 +(2*KEY),3;A;A$;": ";:A: yK$(1)=K$(2)K$(1)=K$(3)K$(1)=K$(4)K$(1)=K$(5)5310:5200P aK$(2)=K$(3)K$(2)=K$(4)K$(2)=K$(5)5310:5200P IK$(3)=K$(4)K$(3)=K$(5)5310:5200P 1K$(4)=K$(5)5310:5200P z#1;1;0,4;"ALL THE KEYS ARE FINE !";1;1,1;"PRESS ANY KEY - TO CONTINUE"  =""5130  : P%5000:5300:KEY=1 U75019+KEY:A$:5050:Z=125:Z Z=""5210Z \=K$(KEY)=:(KEY+2);1;K$(KEY):KEY=KEY+1 _KEY>55090 d 5205U A=145-:A: z1,12 :#1;2;1;1,4;"SORRY, CAN'T DO THAT !!":2,-12 :30:: p&0:0:7:1: q65380d:54970 uQN=815:N,4;2;6;"%";N,26;"%":N w10 ,7;5;"COLIN THE CLEANER";12 ,7;"STARRING ]";13 ,7;" COLIN ]";7;12 ,22;"i";13 ,22;"w" xqN=313 :8,N*2-2;2;6;"%";15,N*2-2;"%":N z 9100#: {(21,0;0;0;,, |A$:A$="QUIT"6100 }}A=1̱A$:21,A;A$(A);5;"*":A$(A)32 .003xD,5:.005y# =,10 :.003xD,5 ="D"5200P:6000p  ="S": 9030F#:502 \="J"K$(1)="6":K$(2)="7":K$(3)="0":K$(4)="8":K$(5)="9" A:21,A;" " "N=110 :65420 ="D"5200P:6000p ="S":9030F#:502 N  6012| ʯ2,7,2,9 ,2,7,2,5,2,4,2,5,2,7,2,7,2,9 ,2,7,2,5,2,4,2,5,2,7,2,7,2,7,2,5,2,4,2,2,2,7,2,5,2,4,2,2,2,7,2,5,2,4,2,2,8,0,2,19,2,21,2,19,2,17,2,16,2,17,2,19,2,19,2,21,2,19,2,17,2,16,2,17,2,19,2,19,2,19,2,17,2,16,2,14,2,19,2,17,2,16,2,14,2,19,2,17,2,16Track-Info  R ,2,14,2,12 ,-99c,0  6090 C,D 1C=-99c9030F#:9600%:6000p C/502,D:C/502,D  6110 L P'S Vb=55032+(LEV*358f) jdn=031:21,n;¾(b+n):¾(B+N)32 .002xn,9 :.004yn,0 oN tno=(b+32 ) ~23693\,122z:n=1no:a(4):m=14:a(m)=(b+28+(n*4)+m):m:7570+(a(1)*3):n  7610 m52000 ,A(2):52001!,A(3):52002",(A(2)-A(4))+1:52005%: 52000 ,A(2):52001!,A(3):A(2)A(4)52002",(A(4)-A(3))+1:52050R: TA(2)>A(4)52002",(A(2)-A(4))+1:52050R: m52000 ,A(2):52001!,A(3):52002",(A(4)-A(3))+1:52100: m52000 ,A(2):52001!,A(3):52002",(A(2)-A(4))+1:52150:  S'S 623693\,71G:b=b+194:NO=(B-1) Pn=1no:a1=((n-1)*2+b):a2=((n-1)*2+1+b) !a1,a2;0;7;"%":n  O'S 5a$="_opqrstu":B=B+41):NO=(B-1):OB=NO hn=1no:a1=((n-1)*2+b):a2=((n-1)*2+1+b):I=(*6)+2  00;a1,a2;I;a$((*8)+1):n  R'S K23693\,70F:52029=,38&:b=b+61=:NO=(B-1) 2[n=1no:a(3):m=13:a(m)=((n-1)*3+(m-1)+b):m <52000 ,(A(1)+A(3))-A(1):52001!,A(2):52002",(A(3)-A(1))+1:52005%:n F<23693\,71G:52029=,35#:54970:  E'S Vb=b+60<:b,(b+1);7;1;1;"$":oc=0:100d JFli=li-1:#1;1,12 ;li:li085004! T!x=18:y=1:78N !>ia=110 :254,(*200):.01z# =,a:.02{# =,a+12 :.01z# =,a+6:a !\ 4602 #GqLEV=1:OC=0:LI=3:TI=5000:R1=1:L1=1:X=18:Y=1:SC=0: #P T=0 #UbA=T214:ں(A/4)+1;A,0;Z$:A:T=T+1:T<49045U# #VkA=010 :0;A,0;Z$;21-A,0;Z$:A:52204,3:52200: #Z#1;4;0,1;"TIME LEFT ";0,18;"SCORE";1,1;"LIVES LEFT";1,18;"LEVEL";0;" ";LEV: #dS19,0;2;7;1;"################################": #c"","HELLO THERE! THIS IS","COLIN THE CLEANER","","","AUTHORS :","HARRY S PRICE","CASPAR THE CAT." #"","GRAPHICS :","HARRY S PRICE","","MUSIC :","HELP FROM MY WIFE","","WITH INTERFERENCE FROM","CASPAR THE BURMESE :","AND INTERRUPTIONS FROM :","BISTO THE SIAMESE" #b"","","TO START THE GAME :","PRESS THE 'S' KEY.","","","MOVEMENT KEYS CAN BE DEFINED.","","KEYS CURRENTLY SET AS :-","'"+K$(1)+"' .... MOVE LEFT.","'"+K$(2)+"' .... MOVE RIGHT.","'"+K$(3)+"' .... ACTION KEY.","'"+K$(4)+"' .... HOLD KEY.","'"+K$(5)+"' .... ABORT KEY.","","TO RE-DEFINE MOVEMENT KEYS :","PRESS THE 'D' KEY.","PRESS THE 'J' KEY","TO USE INTERFACE2 JOYSTICK","KEMPSTON USERS","JUST PRESS THE 'S' KEY","","YOUR TASK IN LIFE IS :","TO GUIDE COLIN AROUND EACH","LEVEL OF THE MUSEUM,","COLLECTING ALL THE LITTER","SCATTERED AROUND BY THE","CHILDREN FROM THE SCHOOLTRIP" #"THIS WILL RESULT IN A FLASHING","EXIT SIGN WHICH YOU MUST TOUCH","THIS WILL THEN ALLOW YOU TO","PASS ONTO THE NEXT ROOM.","","","BEWARE OF THE FOLLOWING :","1...FALLING ONTO OBJECTS.","2...DROPPING DOWN A STEP","3...FALLING ONTO LIFTS","4...BECOMING STRANDED." #"REMEMBER TO USE THE","LADDERS TO COME DOWN","DO NOT GO DOWN A STEP","USE THE WHITE LIFTS","TO MOVE TO A DIFFERENT","LEVEL ON THE SAME SCREEN" # "","","WARNING :","ANYONE CAUGHT COPYING THIS","GAME WILL BE PRAISED HIGHLY,","FOR INTELLIGENCE,INITIATIVE","AND USING SOMEONE ELSES","BRAIN TO DO THE WORK","","","","","@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@","@@@ HACK IT TO BITS PLEASE!@@@","@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@" #>"","","","","NOW ENTERING DEMO MODE ....","","","","","QUIT" $T INP. HS $U&0:0:7:0: $YoB$="*******************************":A$="ABCDEFGHIJKLMNOPQRSTUVWXYZ !*,.012345Track-Info  R 6789":W=1:W$(19) $Z$W$(19):W=1:Q=1 $^M=26:N=06:52204,(N/3):10 ,0;1;7-N;B$;11 ,0;N;" C O N G R A T U L A T I O N S";12 ,0;7-N;B$:52200:N:M $`fN=031:.003xD,N:.005y# =,N+24:10 ,N;" ";12 ,31-N;" ":N $cr55000::0,0;6;1;" YOUR NAME CAN NOW BE SCRIBED ONTO THE LIST OF SUCCESS" $hy3;''"PRESS '";K$(1);"' AND '";K$(2);"' TO SELECT THE"'" CORRECT LETTER THEN PRESS '";K$(3);"'" $m@9 ,15;7;1;"\";11 ,15;"[" $nnN=1416:N,5;3;" ":N:15,6;" " $o 7 $r61;10 ,0;6;A$(QQ+30) $wN$=:N$=""9335w$ $|A.005y# =,9 :N$=K$(2)A$=A$(2)+A$(1) $}/N$=K$(1)A$=A$(41))+A$(40() $~?N$=K$(3)W$(W)=A$(16):55030:W=W+1 $&N$=12 W$(W)=" ":W=W-1 $N$=13 9360$ $W=0W=1 $W=20W=19 $B15,6;W$;16,W+4;3;0;" [ " $@9 ,15;7;1;"\";11 ,15;"[" $ 9330r$ $p:N=088X4:3:0,N:255,0:0,175-N:255,0:N $)N=110 :SCS(N)9375$ $N $BZ=10 N-1:S(Z+1)=S(Z):S$(Z+1)=S$(Z):Z $#S(Z+1)=SC:S$(Z+1)=W$ $0:2:0: $DIS HS-TAB $TN=01654:0,175-N:N,N:255-N,0:N,N:N $.1:1,8;"HIGH SCORE TABLE" $֑N=110 :.01z# =,N:4:(N*2)+1,1;S$(N);(N*2)+1,22;S(N);" "(9 -S(N)):N $=""9440$ $ :20 % % HS TAB %&g9530:%:S(11 ):S$(11 ,19):N=110 :S(N)=999*N:S$(N),S(N):N: %:"MATTHEW",6543,"JEFF",54328,"MICKY",4321,"MOUSE",3210 ,"WINSTON",3100 ,"CHURCHILL",2109=,"GRUMPY",1500,"SLEEPY",1000,"SNEEZY",545!,"ME",400 % DEMO %:#1;0,0;"PRESS A KEY WHEN THE BEEP SOUNDS";1,3;1;"DEMO MODE";0;1,16;"LEVEL NO : ";LEV::9060d#:7500L:200:LEV=LEV+1 %=""LEV<169610% % ' b$4 PLUS3DOSTDCC? 48000 C:7:0:10 ,7;1;"COLIN is loading"  "ccode" ~23658j\,8:23613=\,0:23659k\,2::52255:236066\,88X:236077\,251: H9500%:Z$=" ":G$="vi":K$="ZXMHA" 0:0:0: :n=10 17:.05|L,n:.05|L,n-1:n  6000p 2 9060d# K9050Z#:7030v M4#1;1,12 ;li;0,25;sc NX,Y;"v";x-1,y;"i" PJti=ti-1:#1;0,12 ;ti;" ":ti085004! Zoc=ob7900 d%=K$(1)y>01000 i)31=2y>01000 n&=K$(2)y<312000 s*31=1y<312000 x=K$(3)3000 } 31=163000 ,Track-Info R         =K$(4).1}L,9 :200 /=K$(5).2~L,5::6000p 80P A=1502:A H=0 &N=1110n:""210 N #H=H+2:H>2H=0 5H:.01z# =,12 :.02{# =,0:205 &.1}L,24:0:80P  R1=0 ,(x-1,y-1)=122z80P (x,y-1)=122zx,y;" ";x-1,y;" ":x=x-1:y=y-1:x,y;"e";x-1,y;"a":L=15:L:.005y# =,10 :80P (x,y-1)>1ƫ(X,Y-1)7x,y;" ";x-1,y;" ":y=y-1:x,y;"e";x-1,y;"a":oc=oc+1:4600:80P G(x,y-1)=207ū(x-1,y-1)=2074110 U(x+1,y-1)=71GX,Y;" ";X-1,Y;" ":Y=Y-1:4000 'L1=L1+1:L1=5L1=1 OX,Y;" ";X-1,Y;" ":Y=Y-1:(1309+L1):R1=0:80P 1x,y;"e";x-1,y;"a":.002xn,9 : 1x,y;"f";x-1,y;"b":.002xn,9 :  1x,y;"g";x-1,y;"c":.002xn,9 : !1x,y;"h";x-1,y;"d":.002xn,9 :  L1=0 ,(x-1,y+1)=122z80P ՟(x,y+1)=122zx,y;" ";x-1,y;" ":x=x-1:y=y+1:x,y;"x";x-1,y;"i":L=15:L:.005y# =,10 :80P ڗ(x,y+1)>1ƫ(X,Y+1)7x,y;" ";x-1,y;" ":y=y+1:x,y;"v";x-1,y;"i":oc=oc+1:4600:80P G(x,y+1)=207ū(x-1,y+1)=2074110 U(x+1,y+1)=71GX,Y;" ";X-1,Y;" ":Y=Y+1:4000 'R1=R1+1:R1=5R1=1 OX,Y;" ";X-1,Y;" ":Y=Y+1:(2309 +R1):L1=0:80P 1x,y;"v";x-1,y;"i":.002xn,9 : 1x,y;"w";x-1,y;"j":.002xn,9 : 1x,y;"x";x-1,y;"k":.002xn,9 : 1x,y;"y";x-1,y;"l":.002xn,9 : R1,2500 : %(x+1,y)=70F3050 $(x+1,y)=73300 80P a=x:55000 x,y;" ";x-1,y;" " e.01z# =,a:.02{# =,a-24:a=a+1:a,y;"";a-1,y;"~";6;a-2,y;"&" 5(a+1,y)=122zx=a:3100 :80P 3055 L1=031200 &(1309+L1):3130: 0(2309 +R1) : L1=0G$="vi" R1=0G$="ea" 55000:a=70-1:a;x,y;g$(1);x-1,y;g$(2):.003xD,A:a:0;0;X,Y;" ";X-1,Y;" " Aa=x0-1:(a,y)=122zx=a-1:3350 a 52204,4:52200:a=07:a;x,y;g$(1);x-1,y;g$(2):.003xD,A:a:80P x,y;" ";x-1,y;" " a=x17 =(a+1,y)=122zū(a+1,y)=74030 ka,y;"~";a+1,y;"";a-1,y;" ":.008zn,a:.008zn,a-12 :254,(*200)  A:0 K55060:.1}L,0:N=120:N:.5,-20 TZ=07:Z:Z;A-1,y;"m";A,y;"n":52204,Z:52200:Z fZ=70-1:Z:Z;A-1,y;"m";A,y;"n":52204,Z:52200:Z:0 A,y;" ";A-1,y;" " 54970:8010J R54970:lev=lev+1:.5,lev:lev=16ti14605 99040P#:9060d#:y=1:x=18:75K ?SC=SC+10 :55030:#1;0,25;SC: LEV164606 :9300T$ a:TI00,0;"WHAT A WALLY...YOU HAVE LEFT IT FAR TOO LATE.TRY AGAIN!!" k''" WHAT A DISASTER...YOU WEREN'T EVEN GOOD ENOUGH TO QUALIFY FOR THE HIGH SCORE TABLE! " /N=12:55060:N:100d  4700\ C,D:C=-99c4650*  C/40(,D:C/40(,D % 4630 *M=61-1:52204,M:M::55030:N=011 :N,0;M;Z$;21-N,0;Z$:N:52200:M:0:0:7: 4 6000p \:3,0,3,5,3,7,3,9 ,3,7,3,4,3,0,3,5,3,7,3,9 ,3,7,3,0,3,5,3,7,3,9 ,3,7,3Track-Info R         ,4,3,4,3,5,3,4,3,0,3,0,3,12 ,3,11 ,3,9 ,3,7,3,11 ,3,7,3,9 ,3,5,3,7,3,12 ,3,11 ,3,9 ,3,7,3,11 ,3,7,3,12 ,3,11 ,3,9 ,3,7,3,11 ,3,7,3,9 ,3,5,3,7,3,4,3,5,3,4,3,0,8,0 L3,0,3,5,3,7,3,9 ,3,7,3,4,3,0,3,5,3,7,3,9 ,3,7,3,0,3,5,3,7,3,9 ,3,7,3,4,3,4,3,5,3,4,3,0,3,0,3,12 ,3,11 ,3,9 ,3,7,3,11 ,3,7,3,9 ,3,5,3,7,3,12 ,3,11 ,3,9 ,3,7,3,11 ,3,7,3,12 ,3,11 ,3,9 ,3,7,3,11 ,3,7,3,9 ,3,5,3,7,3,4,3,5,3,4,3,0,8,0,-99c,0 :65380d:A=07.5:.01z# =,10 :A;10 ,6;"KEY SELECTION PHASE";8,1;"C O L I N T H E C L E A N E R":A: "KEY TO MOVE LEFT ? " "KEY TO MOVE RIGHT ? " "THE ACTION KEY ? " "THE HOLD KEY ? " "THE ABORT KEY ? " gA=0KEY+2.5:.01z# =,10 :10 +(2*KEY),3;A;A$;": ";:A: yK$(1)=K$(2)K$(1)=K$(3)K$(1)=K$(4)K$(1)=K$(5)5310:5200P aK$(2)=K$(3)K$(2)=K$(4)K$(2)=K$(5)5310:5200P IK$(3)=K$(4)K$(3)=K$(5)5310:5200P 1K$(4)=K$(5)5310:5200P z#1;1;0,4;"ALL THE KEYS ARE FINE !";1;1,1;"PRESS ANY KEY - TO CONTINUE"  =""5130  : P%5000:5300:KEY=1 U75019+KEY:A$:5050:Z=125:Z Z=""5210Z \=K$(KEY)=:(KEY+2);1;K$(KEY):KEY=KEY+1 _KEY>55090 d 5205U A=145-:A: z1,12 :#1;2;1;1,4;"SORRY, CAN'T DO THAT !!":2,-12 :30:: p&0:0:7:1: q65380d:54970 uQN=815:N,4;2;6;"%";N,26;"%":N w10 ,7;5;"COLIN THE CLEANER";12 ,7;"STARRING ]";13 ,7;" COLIN ]";7;12 ,22;"i";13 ,22;"w" xqN=313 :8,N*2-2;2;6;"%";15,N*2-2;"%":N z 9100#: {(21,0;0;0;,, |A$:A$="QUIT"6100 }}A=1̱A$:21,A;A$(A);5;"*":A$(A)32 .003xD,5:.005y# =,10 :.003xD,5 ="D"5200P:6000p  ="S": 9030F#:502 \="J"K$(1)="6":K$(2)="7":K$(3)="0":K$(4)="8":K$(5)="9" A:21,A;" " "N=110 :65420 ="D"5200P:6000p ="S":9030F#:502 N  6012| ʯ2,7,2,9 ,2,7,2,5,2,4,2,5,2,7,2,7,2,9 ,2,7,2,5,2,4,2,5,2,7,2,7,2,7,2,5,2,4,2,2,2,7,2,5,2,4,2,2,2,7,2,5,2,4,2,2,8,0,2,19,2,21,2,19,2,17,2,16,2,17,2,19,2,19,2,21,2,19,2,17,2,16,2,17,2,19,2,19,2,19,2,17,2,16,2,14,2,19,2,17,2,16,2,14,2,19,2,17,2,16Track-Info R         ,2,14,2,12 ,-99c,0  6090 C,D 1C=-99c9030F#:9600%:6000p C/502,D:C/502,D  6110 L P'S Vb=55032+(LEV*358f) jdn=031:21,n;¾(b+n):¾(B+N)32 .002xn,9 :.004yn,0 oN tno=(b+32 ) ~23693\,122z:n=1no:a(4):m=14:a(m)=(b+28+(n*4)+m):m:7570+(a(1)*3):n  7610 m52000 ,A(2):52001!,A(3):52002",(A(2)-A(4))+1:52005%: 52000 ,A(2):52001!,A(3):A(2)A(4)52002",(A(4)-A(3))+1:52050R: TA(2)>A(4)52002",(A(2)-A(4))+1:52050R: m52000 ,A(2):52001!,A(3):52002",(A(4)-A(3))+1:52100: m52000 ,A(2):52001!,A(3):52002",(A(2)-A(4))+1:52150:  S'S 623693\,71G:b=b+194:NO=(B-1) Pn=1no:a1=((n-1)*2+b):a2=((n-1)*2+1+b) !a1,a2;0;7;"%":n  O'S 5a$="_opqrstu":B=B+41):NO=(B-1):OB=NO hn=1no:a1=((n-1)*2+b):a2=((n-1)*2+1+b):I=(*6)+2  00;a1,a2;I;a$((*8)+1):n  R'S K23693\,70F:52029=,38&:b=b+61=:NO=(B-1) 2[n=1no:a(3):m=13:a(m)=((n-1)*3+(m-1)+b):m <52000 ,(A(1)+A(3))-A(1):52001!,A(2):52002",(A(3)-A(1))+1:52005%:n F<23693\,71G:52029=,35#:54970:  E'S Vb=b+60<:b,(b+1);7;1;1;"$":oc=0:100d JFli=li-1:#1;1,12 ;li:li085004! T!x=18:y=1:78N !>ia=110 :254,(*200):.01z# =,a:.02{# =,a+12 :.01z# =,a+6:a !\ 4602 #GqLEV=1:OC=0:LI=3:TI=5000:R1=1:L1=1:X=18:Y=1:SC=0: #P T=0 #UbA=T214:ں(A/4)+1;A,0;Z$:A:T=T+1:T<49045U# #VkA=010 :0;A,0;Z$;21-A,0;Z$:A:52204,3:52200: #Z#1;4;0,1;"TIME LEFT ";0,18;"SCORE";1,1;"LIVES LEFT";1,18;"LEVEL";0;" ";LEV: #dS19,0;2;7;1;"################################": #c"","HELLO THERE! THIS IS","COLIN THE CLEANER","","","AUTHORS :","HARRY S PRICE","CASPAR THE CAT." #"","GRAPHICS :","HARRY S PRICE","","MUSIC :","HELP FROM MY WIFE","","WITH INTERFERENCE FROM","CASPAR THE BURMESE :","AND INTERRUPTIONS FROM :","BISTO THE SIAMESE" #b"","","TO START THE GAME :","PRESS THE 'S' KEY.","","","MOVEMENT KEYS CAN BE DEFINED.","","KEYS CURRENTLY SET AS :-","'"+K$(1)+"' .... MOVE LEFT.","'"+K$(2)+"' .... MOVE RIGHT.","'"+K$(3)+"' .... ACTION KEY.","'"+K$(4)+"' .... HOLD KEY.","'"+K$(5)+"' .... ABORT KEY.","","TO RE-DEFINE MOVEMENT KEYS :","PRESS THE 'D' KEY.","PRESS THE 'J' KEY","TO USE INTERFACE2 JOYSTICK","KEMPSTON USERS","JUST PRESS THE 'S' KEY","","YOUR TASK IN LIFE IS :","TO GUIDE COLIN AROUND EACH","LEVEL OF THE MUSEUM,","COLLECTING ALL THE LITTER","SCATTERED AROUND BY THE","CHILDREN FROM THE SCHOOLTRIP" #"THIS WILL RESULT IN A FLASHING","EXIT SIGN WHICH YOU MUST TOUCH","THIS WILL THEN ALLOW YOU TO","PASS ONTO THE NEXT ROOM.","","","BEWARE OF THE FOLLOWING :","1...FALLING ONTO OBJECTS.","2...DROPPING DOWN A STEP","3...FALLING ONTO LIFTS","4...BECOMING STRANDED." #"REMEMBER TO USE THE","LADDERS TO COME DOWN","DO NOT GO DOWN A STEP","USE THE WHITE LIFTS","TO MOVE TO A DIFFERENT","LEVEL ON THE SAME SCREEN" # "","","WARNING :","ANYONE CAUGHT COPYING THIS","GAME WILL BE PRAISED HIGHLY,","FOR INTELLIGENCE,INITIATIVE","AND USING SOMEONE ELSES","BRAIN TO DO THE WORK","","","","","@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@","@@@ HACK IT TO BITS PLEASE!@@@","@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@" #>"","","","","NOW ENTERING DEMO MODE ....","","","","","QUIT" $T INP. HS $U&0:0:7:0: $YoB$="*******************************":A$="ABCDEFGHIJKLMNOPQRSTUVWXYZ !*,.012345Track-Info R         6789":W=1:W$(19) $Z$W$(19):W=1:Q=1 $^M=26:N=06:52204,(N/3):10 ,0;1;7-N;B$;11 ,0;N;" C O N G R A T U L A T I O N S";12 ,0;7-N;B$:52200:N:M $`fN=031:.003xD,N:.005y# =,N+24:10 ,N;" ";12 ,31-N;" ":N $cr55000::0,0;6;1;" YOUR NAME CAN NOW BE SCRIBED ONTO THE LIST OF SUCCESS" $hy3;''"PRESS '";K$(1);"' AND '";K$(2);"' TO SELECT THE"'" CORRECT LETTER THEN PRESS '";K$(3);"'" $m@9 ,15;7;1;"\";11 ,15;"[" $nnN=1416:N,5;3;" ":N:15,6;" " $o 7 $r61;10 ,0;6;A$(QQ+30) $wN$=:N$=""9335w$ $|A.005y# =,9 :N$=K$(2)A$=A$(2)+A$(1) $}/N$=K$(1)A$=A$(41))+A$(40() $~?N$=K$(3)W$(W)=A$(16):55030:W=W+1 $&N$=12 W$(W)=" ":W=W-1 $N$=13 9360$ $W=0W=1 $W=20W=19 $B15,6;W$;16,W+4;3;0;" [ " $@9 ,15;7;1;"\";11 ,15;"[" $ 9330r$ $p:N=088X4:3:0,N:255,0:0,175-N:255,0:N $)N=110 :SCS(N)9375$ $N $BZ=10 N-1:S(Z+1)=S(Z):S$(Z+1)=S$(Z):Z $#S(Z+1)=SC:S$(Z+1)=W$ $0:2:0: $DIS HS-TAB $TN=01654:0,175-N:N,N:255-N,0:N,N:N $.1:1,8;"HIGH SCORE TABLE" $֑N=110 :.01z# =,N:4:(N*2)+1,1;S$(N);(N*2)+1,22;S(N);" "(9 -S(N)):N $=""9440$ $ :20 % % HS TAB %&g9530:%:S(11 ):S$(11 ,19):N=110 :S(N)=999*N:S$(N),S(N):N: %:"MATTHEW",6543,"JEFF",54328,"MICKY",4321,"MOUSE",3210 ,"WINSTON",3100 ,"CHURCHILL",2109=,"GRUMPY",1500,"SLEEPY",1000,"SNEEZY",545!,"ME",400 % DEMO %:#1;0,0;"PRESS A KEY WHEN THE BEEP SOUNDS";1,3;1;"DEMO MODE";0;1,16;"LEVEL NO : ";LEV::9060d#:7500L:200:LEV=LEV+1 %=""LEV<169610% % ' b$4 Track-Info R         Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info R         Track-Info ! R!!!!!!!!! Track-Info " R""""""""" Track-Info # R######### Track-Info $ R$$$$$$$$$ Track-Info % R%%%%%%%%% Track-Info & R&&&&&&&&& Track-Info ' R'''''''''